object Form1: TForm1
  Left = 298
  Top = 162
  Width = 772
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object cxGroupBox1: TcxGroupBox
    Left = 0
    Top = 0
    Align = alTop
    PanelStyle.Active = True
    Style.BorderStyle = ebsFlat
    TabOrder = 0
    OnMouseUp = cxGroupBox1MouseUp
    Height = 59
    Width = 764
    object btnAppend: TxDBButton
      Left = 80
      Top = 13
      Width = 99
      Height = 33
      Caption = #26032' '#22686
      TabOrder = 0
      DataButtonType = nbAppend
      DataSource = dsSet
      DisableReasons = [drReadonly, drEditing]
      RuntimeEnabled = True
    end
    object btnSave: TxDBButton
      Left = 363
      Top = 13
      Width = 99
      Height = 33
      Caption = #20445' '#23384
      TabOrder = 1
      DataButtonType = nbPost
      DataSource = dsSet
      DisableReasons = [drNotEditing]
      RuntimeEnabled = True
    end
    object btnCancel: TxDBButton
      Left = 504
      Top = 13
      Width = 99
      Height = 33
      Caption = #21462' '#28040
      TabOrder = 2
      DataButtonType = nbCancel
      DataSource = dsSet
      DisableReasons = [drNotEditing]
      RuntimeEnabled = True
    end
    object btnDelete: TxDBButton
      Left = 221
      Top = 13
      Width = 99
      Height = 33
      Caption = #21024' '#38500
      TabOrder = 3
      DataButtonType = nbDelete
      DataSource = dsSet
      OnAfterAction = btnDeleteAfterAction
      DisableReasons = [drReadonly, drEditing, drEmpty]
      RuntimeEnabled = True
    end
  end
  object gdSet: TcxGrid
    Left = 0
    Top = 59
    Width = 764
    Height = 394
    Align = alClient
    TabOrder = 1
    object gvSetView: TcxGridDBCardView
      NavigatorButtons.ConfirmDelete = False
      FilterBox.CustomizeDialog = False
      DataController.DataSource = dsSet
      DataController.KeyFieldNames = 'RecId'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      Filtering.MRUItemsList = False
      OptionsBehavior.GoToNextCellOnEnter = True
      OptionsCustomize.CardSizing = False
      OptionsCustomize.RowExpanding = False
      OptionsCustomize.RowFiltering = False
      OptionsSelection.InvertSelect = False
      OptionsView.CardBorderWidth = 5
      OptionsView.CardWidth = 300
      object gvSetViewRecId: TcxGridDBCardViewRow
        DataBinding.FieldName = 'RecId'
        Visible = False
        Position.BeginsLayer = True
      end
      object gvSetViewDataBase: TcxGridDBCardViewRow
        DataBinding.FieldName = 'DataBase'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.EchoMode = eemPassword
        Properties.PasswordChar = '*'
        Position.BeginsLayer = True
      end
      object gvSetViewDBName: TcxGridDBCardViewRow
        DataBinding.FieldName = 'DBName'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.EchoMode = eemPassword
        Properties.PasswordChar = '*'
        Position.BeginsLayer = True
      end
      object gvSetViewUsername: TcxGridDBCardViewRow
        DataBinding.FieldName = 'Username'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.EchoMode = eemPassword
        Properties.PasswordChar = '*'
        Position.BeginsLayer = True
      end
      object gvSetViewPassword: TcxGridDBCardViewRow
        DataBinding.FieldName = 'Password'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.EchoMode = eemPassword
        Properties.PasswordChar = '*'
        Position.BeginsLayer = True
      end
    end
    object gdSetLevel: TcxGridLevel
      GridView = gvSetView
    end
  end
  object qrSet: TdxMemData
    Indexes = <>
    SortOptions = []
    AfterPost = qrSetAfterPost
    Left = 672
    Top = 56
    object qrSetDataBase: TStringField
      DisplayLabel = #26381#21153#22120
      FieldName = 'DataBase'
    end
    object qrSetDBName: TStringField
      DisplayLabel = #25968#25454#24211#21517#31216
      FieldName = 'DBName'
    end
    object qrSetUsername: TStringField
      DisplayLabel = #29992#25143#21517
      FieldName = 'Username'
    end
    object qrSetPassword: TStringField
      DisplayLabel = #23494#30721
      FieldName = 'Password'
    end
  end
  object dsSet: TDataSource
    DataSet = qrSet
    Left = 624
    Top = 56
  end
end
